home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / Demos / Herois / Codigo.Cst / 00004_FrameAbertura.ls < prev    next >
Encoding:
Text File  |  1999-03-19  |  903 b   |  44 lines
  1. on exitFrame
  2.   global mantra
  3.   if not mantra and the timer > 180 then
  4.     set the volume of sound 2 to 255
  5.     puppetSound 2, "Mantra2"
  6.     sound fadeIn 2,30
  7.     set mantra = true
  8.     updateStage
  9.   end if
  10.   
  11.   go the frame
  12. end
  13.  
  14. on getBehaivorDescription
  15.   return "Pause na saida do frame, chamando #idleSprite para todos sprites durante #idle"
  16. end
  17.  
  18. on idle
  19.   global gMustUpdate
  20.   set gMustUpdate to false
  21.   sendAllSprites(#idleSprite)
  22.   if gMustUpdate then updateStage
  23. end
  24.  
  25. on mouseUp
  26.   global mantra
  27.   if not mantra then
  28.     set the volume of sound 2 to 255
  29.     puppetSound 2, "Mantra2"
  30.     set mantra = true
  31.   end if
  32.   
  33.   
  34.   
  35.   puppetSound 1,0
  36.   updateStage
  37.   set the volume of sound 1 to 255
  38.   updateStage
  39.   sendAllSprites #cleanSprite
  40.   go frame "Creditos"
  41.   unloadMember member "VideoAbertura"
  42.   unloadMember member "MascaraNoisePrim1", member "MascaraNoiseUlt6"
  43.   unloadMember member "Mantra1"
  44. end